﻿Public Class StringUtil
    Public Shared Function toInteger(ByVal valor As String) As Integer
        If LTrim(RTrim(valor)) = "" Then
            Return 0
        Else
            Return CInt(valor)
        End If
    End Function
End Class
